﻿Imports System.Data.OleDb
Public Class DataProvider
    Public Shared Function ConnectDB() As OleDbConnection
        Dim str As String
        str = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source= QL_HOCSINH.accdb"
        Dim conn As New OleDbConnection(str)
        conn.Open()
        Return conn
    End Function
End Class
